<?php

namespace CMS\Model;

use Think\Model as ThinkModel;

/**
 * 文档基础模型
 */
class Model extends ThinkModel
{
    protected $name = 'cms_model';
    protected $tableName = 'model';
    
    /* 自动验证规则 */
    protected $_validate = array(
        array(
            'name',
            'require',
            '标识不能为空',
            self::MUST_VALIDATE,
            'regex',
            self::MODEL_INSERT
        ),
        array(
            'name',
            '/^[a-zA-Z]\w{0,39}$/',
            '文档标识不合法',
            self::VALUE_VALIDATE,
            'regex',
            self::MODEL_BOTH
        ),
        array(
            'name',
            '',
            '标识已经存在',
            self::VALUE_VALIDATE,
            'unique',
            self::MODEL_BOTH
        ),
        array(
            'title',
            'require',
            '标题不能为空',
            self::MUST_VALIDATE,
            'regex',
            self::MODEL_BOTH
        ),
        array(
            'title',
            '1,30',
            '标题长度不能超过30个字符',
            self::MUST_VALIDATE,
            'length',
            self::MODEL_BOTH
        ),
        array(
            'list_grid',
            'checkListGrid',
            '列表定义不能为空',
            self::MUST_VALIDATE,
            'callback',
            self::MODEL_UPDATE
        )
    );

    /* 自动完成规则 */
    protected $_auto = array(
        array(
            'name',
            'strtolower',
            self::MODEL_INSERT,
            'function'
        ),
        array(
            'create_time',
            NOW_TIME,
            self::MODEL_INSERT
        ),
        array(
            'update_time',
            NOW_TIME,
            self::MODEL_BOTH
        ),
        array(
            'status',
            '1',
            self::MODEL_INSERT,
            'string'
        ),
        array(
            'field_sort',
            'getFields',
            self::MODEL_BOTH,
            'callback'
        ),
        array(
            'attribute_list',
            'getAttribute',
            self::MODEL_BOTH,
            'callback'
        )
    );

    /**
     * 检查列表定义
     * 
     * @param type $data            
     */
    protected function checkListGrid($data)
    {
        return I('post.extend') != 0 || ! empty($data);
    }

    /**
     * 新增或更新一个文档 后台调用的方法,依赖后台用户状态
     * 
     * @return boolean fasle 失败 ， int 成功 返回完整的数据
     */
    public function update()
    {
        /* 获取数据对象 */
        $data = $this->create();
        if (empty($data)) {
            return false;
        }
        
        /* 添加或新增基础内容 */
        if (empty($data['id'])) { // 新增数据
            $id = $this->add(); // 添加基础内容
            if (! $id) {
                $this->error = '新增模型出错！';
                return false;
            }
        } else { // 更新数据
            $status = $this->save(); // 更新基础内容
            if (false === $status) {
                $this->error = '更新模型出错！';
                return false;
            }
        }
        // 清除模型缓存数据
        S('DOCUMENT_MODEL_LIST', null);
        
        // 记录行为
        action_log('update_model', 'model', $data['id'] ? $data['id'] : $id, UID);
        
        // 内容添加或更新完成
        return $data;
    }

    /**
     * 处理字段排序数据
     */
    protected function getFields($fields)
    {
        return empty($fields) ? '' : json_encode($fields);
    }

    protected function getAttribute($fields)
    {
        return empty($fields) ? '' : implode(',', $fields);
    }

    /**
     * 获取指定数据库的所有表名
     */
    public function getTables()
    {
        return $this->db->getTables();
    }

    /**
     * 根据数据表生成模型及其属性数据
     * 
     */
    public function generate($table, $name = '', $title = '')
    {
        // 新增模型数据
        if (empty($name)) {
            $name = $title = substr($table, strlen(C('DB_PREFIX')));
        }
        $data = array(
            'name' => $name,
            'title' => $title
        );
        $data = $this->create($data);
        if ($data) {
            $res = $this->add($data);
            if (! $res) {
                return false;
            }
        } else {
            $this->error = $this->getError();
            return false;
        }
        
        // 新增属性
        $fields = M()->query('SHOW FULL COLUMNS FROM ' . $table);
        foreach ($fields as $key => $value) {
            $value = array_change_key_case($value);
            // 不新增id字段
            if (strcmp($value['field'], 'id') == 0) {
                continue;
            }
            
            // 生成属性数据
            $data = array();
            $data['name'] = $value['field'];
            $data['title'] = $value['comment'];
            $data['type'] = 'string'; // TODO:根据字段定义生成合适的数据类型
                                      // 获取字段定义
            $is_null = strcmp($value['null'], 'NO') == 0 ? ' NOT NULL ' : ' NULL ';
            $data['field'] = $value['type'] . $is_null;
            $data['value'] = $value['default'] == null ? '' : $value['default'];
            $data['model_id'] = $res;
            $_POST = $data; // 便于自动验证
            (new Attribute)->update($data, false);
        }
        return $res;
    }

    /**
     * 删除一个模型
     * 
     * @param integer $id 模型id
     */
    public function del($id)
    {
        // 获取表名
        $model = $this->field('name,extend')->find($id);
        if ($model['extend'] == 0) {
            $table_name = C('DB_PREFIX') . strtolower($model['name']);
        } elseif ($model['extend'] == 1) {
            $table_name = C('DB_PREFIX') . 'document_' . strtolower($model['name']);
        } else {
            $this->error = '只支持删除文档模型和独立模型';
            return false;
        }
        
        // 删除属性数据
        M('Attribute')->where(array(
            'model_id' => $id
        ))->delete();
        // 删除模型数据
        $this->delete($id);
        // 删除该表
        $sql = <<<sql
                DROP TABLE {$table_name};
sql;
        $res = M()->execute($sql);
        return $res !== false;
    }
    
    /**
     * 获取顶级模型信息
     */
    public function allTops($model_id = null)
    {
        $map = [
            'status' => 1,
            'extend' => 0
        ];
        if (!is_null($model_id)) {
            $map['id'] = ['neq', $model_id];
        }
        $models = M('Model')->where($map)
                ->field(true)
                ->index('id')
                ->select();
        
        return $models;
    }
}

